(define t1 (builtin eq? #\x #\x))
(define t2 (builtin print (cons t1 #\x)))
(define t3
  (begin
    (builtin display #\h)
    (builtin display #\e)
    (builtin display #\l)
    (builtin display #\l)
    (builtin display #\o)
    (builtin display #\space)
    (builtin display #\w)
    (builtin display #\o)
    (builtin display #\r)
    (builtin display #\l)
    (builtin display #\d)
    (builtin display #\newline)))
    
